#!/usr/bin/perl
# commadd.cgi

require 'snmp-lib.pl';

&header($text{'commadd_title'}, "", "commadd", undef, 1);
#print "<hr>";

#add community
print "<form name=add method=post action=addcomm.cgi>";
print "<p><BR>$text{'comm_name'} <input class=text type=text name=commName size=20></p>";
print "<p><BR>$text{'comm_right'}:  ",
	"<input type=radio name=aclright value=readonly checked>Read-Only",
	"<input type=radio name=aclright value=readwrite>Read-Write</p>";

print "<p><input class=button1 type=submit value=$text{'submit'}></p>";
print "</form>";

#print "<hr>";
&footer("/ucd-snmp/",$text{'index_title'});


